https://blogs.perl.org/users/saif/screenshot%20of%20screenshot%20in%20action.png